home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 4
/
Aminet 4 - November 1994.iso
/
aminet
/
dev
/
obero
/
oberon_lib.lha
/
oberon-a
/
source1.lha
/
source
/
Amiga
/
BootBlock.mod
< prev
next >
Wrap
Text File
|
1994-08-08
|
1KB
|
52 lines
(***************************************************************************
$RCSfile: BootBlock.mod $
Description: floppy BootBlock definition
Created by: fjc (Frank Copeland)
$Revision: 3.2 $
$Author: fjc $
$Date: 1994/08/08 00:44:18 $
$VER: bootblock.h 36.6 (5.11.90)
Includes Release 40.15
(C) Copyright 1985-1993 Commodore-Amiga, Inc.
All Rights Reserved
Oberon-A interface Copyright © 1994, Frank Copeland.
This file is part of the Oberon-A Interface.
See Oberon-A.doc for conditions of use and distribution.
***************************************************************************)
MODULE BootBlock;
(*
** $C- CaseChk $I- IndexChk $L+ LongAdr $N- NilChk
** $P- PortableCode $R- RangeChk $S- StackChk $T- TypeChk
** $V- OvflChk $Z- ZeroVars
*)
TYPE
BootBlockPtr * = CPOINTER TO BootBlock;
BootBlock * = RECORD
id * : ARRAY 4 OF CHAR; (* 4 character identifier *)
chksum * : LONGINT; (* boot block checksum (balance) *)
dosblock * : LONGINT; (* reserved for DOS patch *)
END; (* BootBlock *)
CONST
bootSects * = 2; (* 1K bootstrap *)
idDos * = "DOS\0";
idKick * = "KICK";
nameDos * = 444F5300H; (* 'DOS\0' *)
nameKick * = 4B49434BH; (* 'KICK' *)
END BootBlock.